home *** CD-ROM | disk | FTP | other *** search
/ Collection of Tools & Utilities / Collection of Tools and Utilities.iso / bbsutil / vuucp223.zip / VUUCP.MOD < prev    next >
Text File  |  1993-08-29  |  895b  |  23 lines
  1. Following is a simple MOD to the VBBS4.BAS module of VBBS that makes the
  2. quoting more UUCP friendly. It changes quoting on messages from UUCP to
  3. have the header line:
  4. "In Article <xxxx.xxx@somewhere>, Someone@somewhere (A person) Writes:"
  5.  
  6. Load up VBBS4.BAS
  7.         In the sub 'writereply' find the following text:
  8.       
  9.   IF useransi THEN
  10.     getny a$, "Quote From Previous Text?"
  11. *   IF a$ = "Y" THEN quote re$
  12. * END IF
  13.  
  14. Replace the starred lines with the following:
  15.       IF a$ = "Y" THEN
  16.                 IF (d1.Extra <> SPACE$(64) AND ASC(d1.Extra) <> 0) THEN
  17.                 quote "In Article " + RTRIM$(d1.Extra) + ", " + RTRIM$(d1.FromS) + "@" + RTRIM$(d1.FromN) + " Writes:": quoted = 1
  18.                 ELSE
  19.                 quote "In a previous message, " + RTRIM$(d1.FromS) + "@" + RTRIM$(d1.FromN) + " Writes:": quoted = 1
  20.                 END IF
  21.         END IF
  22.  
  23.